home *** CD-ROM | disk | FTP | other *** search
/ Telecommunications & Multimedia Encyclopedia / Jones Telecommunications and Multimedia Encyclopedia (Jones)(1996).ISO / mac / ENCYCLOP / OPTMENU.DIR / 00002_Script_2 < prev    next >
Text File  |  1996-01-09  |  2KB  |  73 lines
  1. on exitFrame
  2.   global gButtonClicked,  gDisableThreestate, returnframe
  3.   global gGrayPrint, gGrayFind
  4.   
  5.   moveToFront window "OptionsMenu"
  6.   set done = 0
  7.   
  8.   repeat while NOT ( done )
  9.     
  10.     if ( rollover (2) ) then
  11.       ButtonHandler 2, 12
  12.       if gButtonClicked = 1 then
  13.         DoDictionary
  14.         set gDisableThreestate = 0
  15.         set done = 1
  16.       end if
  17.     end if
  18.     put "Return Frame = " & returnframe
  19.     
  20.     if gGrayFind = 1 then
  21.       puppetsprite 3, true
  22.       set the castnum of sprite 3 to 17
  23.     else
  24.       if ( rollover (3) ) then
  25.         ButtonHandler 3, 15
  26.         if gButtonClicked = 1 then
  27.           DoFind
  28.           set gDisableThreestate = 0
  29.           set done = 1
  30.         end if
  31.       end if
  32.     end if
  33.     
  34.     -- print
  35.     if gGrayPrint  = 0  then
  36.       if ( rollover (4) ) then
  37.         ButtonHandler 4, 18
  38.         if gButtonClicked = 1 then
  39.           DoPrint
  40.           set gDisableThreestate = 0
  41.           set done = 1
  42.         end if
  43.       end if
  44.     else
  45.       -- we are not on a screen for printing
  46.       puppetsprite 4, true
  47.       set the castnum of sprite 4 to 20
  48.     end if
  49.     -- sound level
  50.     if ( rollover (5) ) then
  51.       ButtonHandler 5, 21
  52.       if gButtonClicked = 1 then
  53.         DoSoundLevel
  54.         set done = 1
  55.       end if
  56.     end if
  57.     
  58.     -- close
  59.     if ( rollover (6) ) then
  60.       ButtonHandler 6, 24
  61.       if gButtonClicked = 1 then
  62.         set gDisableThreestate = 0
  63.         set done = 1
  64.       end if
  65.     end if
  66.     
  67.   end repeat
  68.   
  69.   stopMovie
  70.   go to "End"
  71.   
  72.   --go to the frame
  73. end